SI TIENES 



MSX 



UN 



SIN UNIDAD DE DISCO 



A ESTA OPORTUNIDAI 



1.- PUEDES CAMBIARLO POR UN PC-XT 
a) Un ordenador SINCLAIR PC 200 



PC COMPATIBLE XT 

MEMORIA 512 Kb. Y DISCO DE 3.5 » 7S0 KB. 

TOMA T.V. CON TARJETA CGA. 

TRES SLOTS DE EXPANSION. 

INTERFACES SERIE , PARALELO Y MSDOS 3.S 



TU MSX/ 
Y 

20.000 Pts. 



b) Un ordenador PHILIPS NMS TC100 

PC COMPATIBLE XT TURBO (4.77 Y 10 MHz.) 
MEMORIA DE 512 Kb. AMPLIABLE A 640 Kb. 
UNIDAD DE DISCO DE 3.5 ". (DISCO DURO OPCIONAL). 
TARJETA DE VIDEO HERCULES, CGA Y PLANTRONICS. 
TECLADO Y MONITOR EN FOSFORO VERDE INCLUIDOS. 

IE , PARALELO. Y MSDOS 3.3 



TU MSX2 
Y 

40.000 Pts. 



2.- Cambiarlo por u n AMIGA 500 tan 
solo te cuesta tu|~~ 



MSX/ Y 50.000 Pts. 



3.- Tienes ademas de lo anterior muchas 
mas oportunidades. Llámanos y seguro 
que TENEMOS LO QUE QUIERES. 

Ponte e n contacto con nosotros en el 

telefono 1(96 ) 362 48 49. | Tenemos ademas 

la financiación que necesitas. 



ROSE RIVER COMPUTER. 

c/ Salamanca n°4-l, Valencia 46005. (Spain). 



Editorial 



LLEGO LA NAVIDAD 

Esta es la frase que en estos días se suele escuchar en todas partes. Para cuando tú leas 
estas líneas querido lector, incluso nuestra redacción se estará tomando un merecido 
descanso; pero también es cierto que muchos seremos los que ocupemos nuestro ocio con 
un quehacer, o mejor aún aprendiendo, en este caso de nuestro fiel MSX. Es hora de hacer 
un repaso general al año; es en este momento cuando tenemos que formularnos una 
pregunta: ¿qué novedades de interés disponemos para estas fiestas? 

Y aunque venía sucediendo que en los últimos tiempos las novedades en cuanto al 
sistema se refiere debían buscarse con microscopio, ya podemos afirmar que en la 
Navidad tendremos material suficiente como para entretenernos durante un tiempo. En 
primer lugar se ha de hacer mención forzosa de la importación que nuestra editorial está 
haciendo de grandes títulos de juegos japoneses. Ya se apreció en nuestro número 
anterior, con un relanzamiento de Nemesis 3, y en el ejemplar que tienes en tus manos 
sólo has de comprobar las novedades por tí mismo. Existen otros importadores paralelos 
donde, a otro nivel, no cesan de sorprendernos con grandes utilidades para nuestro 
ordenador. El panorama es bastante alentador. Y si están cubiertas las dos opciones, 
tanto de hard como de soft, ¿qué más se puede pedir? 

Pasando a otro tema, tienes ante tí un número especial para pasar grandes momentos. 
Se incluyen secciones ampliadas como la del ensamblador, un artículo sobre un cartucho 
que amplia los canales de sonido, un comentario sobre el juego del momento, los cassettes 
de videojuegos más vendidos, el coleccionable del Japón, el tema que nos habla de la 
combinación de screens, etc. Estamos seguros de que el número os interesará. Nada más, 
tan sólo desearos Felices Pascuas. 

MANHATTAN TRANSFER, S.A. 
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Í TRUCOS Y POKES 
Ensalada de trucos y pokes para 
los gourmets de los videojuegos. 



5| PROGRAMADOR 

Apartado sobre trucos de progra- 
mación abierto a la participación d 
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ORIGEN 
UNA NUEVA 
COMPAÑIA 

Origen es el nombre 



informáti, 



lercado , 



compatibles PC. A su vez, 
ición en la zona de Catalu- 

encargados en esta zona de 

' la distribución de los juegos de otro 
nuevo equipo de programación: Delta. 
Algunos ya sabréis de qué va el asunto, 
puesto que la noticia apareció en otras 
■ s del sector. Tanto en Delta 
in Origen hay dos viejos conoci- 
dos del mundo de los videojuegos: 
Miguel Angel Fernández y Carlos 
Martín, Delta y Origen ahora, respecti- 
famente. Ambos estuvieron en la desa- 
>arecida Zafiro Software y por tanto 
10 les coge de nu 




MANIFIESTO 
ANTI-PIRATA 

Respecto a la carta publicada por uds. que llevaba por título "Manifiesto 
Pirata" considero de interés tengan en cuenta esta réplica de la misma. 
Primero de todo, he de manifestar mi discrepancia respecto de las^ 
opiniones vertidas por el sr. D'Ací acusándoles de "persecución maniática" a, 
nunca mejor dicho, "ese importante grupo de piratas". Creo que ni él mismo se da 
cuenta de la gravedad que implica la cita. Por lo pronto, a mi propio parecer, 
incluso observo que no le prestáis la suficiente atención que el asunto merece. 
¿Dónde han quedado aquellos tiempos de la sección Caza-Piratas? 
En general, hasta en un principio puedes llegar a convencerte de las palabras del 
sr. D'Ací, pues bien es cierto que dentro delpanorama nacional, el software en sí, 
no está en uno de sus mejores momentos. Porque "y si ellos no se ocupan de traer 
novedades internacionales", ¡quién lo hará? La pregunta no está ahí, sino en las 
implicaciones que ello causa. El problema está en que si se encuentra un mercado, 
el nuestro, demasiado copado de copias piratas de tal o cual juego, el distribuidor 
no se decidirá a la hora de invertir un capital en la importación de ciertos 
cartuchos. Se requiere una inversión mínima para una importación. Y después 
queda otra pregunta, ¿el gasto se rentabilizará? La figura del importador es una 
pieza clave para los usuarios. Al fin y al cabo el pirata no responde a una política 
comercial, tan sólo a un mero capricho que llega a escasos sitios; y el resto de 

pirata. Nos preguntamos entonces, qué ocurre. Además, el sr. D'Ací dice estar de 
acuerdo en eliminar al pequeño pirata que copia y copia, vende y vende, "de los 
que hay muchos". Se contradice en este sentido porque "este mal" se beneficia de 
esos grandes piratas que traen el juego, se complican la vida intentando 
desprotegerlo, lo consiguen y reparten copias entre conocidos. Es entonces 
cuando aparece el rapiñero que con una, una sola copia en sus manos, va tiene más 
que suficiente para extraer beneficios de la misma. ¡Es ud., sr. D'Ací de este grupo 
de ingenuos que cree ser único, sólo por haber desprotegido un juego? 



por haber desprotegido un juego? 

Compruebe sus consecuencias. 
Para terminar sr. D'Ací parece ud. el "Justiciero del Software" pues se considera 
en el perfecto derecho de copiar impunemente para que las ventas de los 
distribuidores caigan en picado. Bien, si ya somos pocos, encima veamos si 
quedamos menos. ¡Y cómo puede arremeter contra empresas como Philips y 
Sony? Dentro de sus políticas empresariales ellos sabrán lo que hacen, aunque 
tampoco están en el derecho de asistirnos ante la retirada de un producto como 
dictan las normas de protección al consumidor, y bien que se han preocupado de 
recibir al usuario que necesita una información o busca algo en concreto. Desde 
luego no seré yo quien hable mal de ellos, ya que el servicio de Sony Gallery ha 

Por todo ello, y como Dien dijo ud. sr. D'Ací, se podría hablar largo y tendido 
porque hay polémica para rato, pero hace mucho tiempo que, como ud. dice, el 
baile de disfraces terminó y ya es hora de quitarse las máscaras. Admítalo sr. 
D'Ací, y no se escude detrás de argumentos que nadie cree, porque al fin y al cabo 
ud. no deja de ser un molesto elemento para los usuarios, no deja de ser UN 
PIRATA. 



ir Miguel 
(Tarra; 



[DEL HARD 



I 



BARCELONA 

Desgraciadamente no es 
posible colocar más de cuatro 

linea horizontal de la panta- 
lla. Esto se debe a una limi- 
tación del hardware de los 
MSX, más concretamente te- 
levisión a partir de las dife- 
rentes tablas existentes en la 
VRAM (tabla de caracteres, 
de patrones, de definición de 

tutos 'de sprites). Los MSX- 
2, debido a su nuevo VDP 



tro sprites en línea. El prime- 
ro es conmutar los sprites por 
interrupciones. Este método 
es muy utilizado por muchos 
de los juegos comerciales pa- 
ra MSX. La idea consiste en 



o 4 sprites por línea) j 
«ndo d i tiempo que tarda 



uatro. El cambio es tan 
ípido que el jugador no 
'ega a notarlo. Este método 
•ene como principal incon- 
eniente el que se precisa 

i pantalla para evitar par- 
adeos en el movimiento de 



la primera pantalla de 
primera fase, se colocan m 
tras otra en horizontal, ¡ha 

parpadeo. El ^truco confn 

sgrites^ Están dibujadas s 



pantalla, cosa muy rápida de 
hacer. Para que desaparezca, 
basta con volver a pintarlos 
con color 0. El resultado, 



dispuesto de tal m 
se consigue un apai 




Tortosa (TARRAGONA) 



través del ordenador, ei 



ipo deberá 
tiendo prácticamente ^df ce- 
^Existe otro método, mu- 



P PLAY ta El 'inconveniente "es 
que necesitarás muchas horas 
de pruebas para conseguir un 
sonido que sólo se asemeja 
levemente al que deseas. 

La idea básica consiste en 
variar la forma de la envol- 

del comando PLA Y, algo así 
como PLAY "S10". Con esto 
sólo obtendrás resultados 
bastante pobres. Peí 




MSX-2 y d 
:uando P kp?drGET U DATE 
n pamal?a U DIA P MES- 



■re destinado a la digi- 
digitalizaciones, así que 



AÑO y 

actualidad que me 
MES/DIA/AÑO. 



En la ROM de los MSX 
de segunda generación, en 
las posiciones &H002B y 
&H002C se almacenan los 
identificadores de la nacio- 
nalidad del equipo. Alguna 



DIA/MES/AÑO bastan 
con modificar los bits 4, 5 y 
de la posición &H002B d 



con la línea BASIC que l 

MES/DIAÍAÑ^O^'trani 
forma al formato DIA/ 
MES/AÑO. 
10 GET DATE A$ 
20 At=MID$ (AS, 4, 2) + 



MIDt (A$, 1, 2) + 
■ MIDt (AS, 7) 
30 PRINT AS "Z Z "Z 



Z / / / X Z ■/. Z "2 
Z "Z "Z "Z "Z "Z "Z Z "2 
Z "Z "Z "Z 'Z "Z "Z "Z "2 
Z "Z Z "Z Z "Z Z "Z "2 
Z Z "Z "Z "Z "Z "Z "Z "2 
"Z "Z "Z "Z "Z 'Z "Z Z "2 
Z "Z Z Z Z Z "Z "Z "2 
"Z "Z "Z Z Z "Z 'Z "Z "2 

•z -z -z -z -z -z z -z -z 
"Z -z -z -z -z -z z z z 
-z -z 



BRAINSTORM ■ 



.Por Wffly Miragall , 



GLOSARIO MSX 



Seguimos adelante con nues- 
tro pequeño glosario informá- 
tico. Esperamos que las defini- 
ciones que incluimos en este 
número os sean de utilidad. 
¡Ah!, y seguimos esperando 
' as acerca (' 
, . etc, para L_ 
en la última entrega de 
miniglosario. 



términos, 



programas diseñados para poder crear 
¡jran cantidad de diferentes bases de 

A este tipo de programas se les deno- 

inglés, DataBase Management System 
(BMS). 

Debug: En el mundo de la informá- 
tica se conoce con el nombre debug 
(escarabajo en inglés) a los errores que 
aparecen en la realización de un pro- 
grama. Existen una serie de programas 
que ayudan al programador a localizar 
y a corregir estos errores. Estos pro- 
gramas, lógicamente, son los debug- 
gers. A menudo se piensa que los 
programas de Debug sólo existen para 
lenguaje ensamblador; pero esto no es 
cierto ya que existen buenos debuggers 

Pascal? C S oTasic° S '"S" 1 '"' C ° m ° 
Decimal:: En general cualquier nú- 



digital es que se trata de algo represen- 
table en binario. Por ejemplo el sonido 




le el ordenador dispone de 



ramas de usuario, pu& 
cualquier parte de la m 




INDICE BIT-BIT 

(1) COMANDO 4 

-MADE IN SPAIN- 

(2) INDIANA JONES 
AND THE LAST 
CRUSADE 

-U.S. GOLD- 

(3) EMILIO 
BUTRAGUENO 2 

-OCEAN- 

(4) MOT 

-OPERA- 

(5) DRAZEN 
PETROVIC 
BASKET 

-TOPO- 




IMPRESION: Menudos 
SEGUNDA IMPRESION: ¡Menuda 
TERCERA IMPRESION: ¡Maravilla 



(5) DRAZEN 
PETROVIC 
BASRET 



M~ profesional, y no se puede 
negar que lo intentan. Su nueva política 
de sacar pocos títulos pero que éstos 
sean de gran calidad es muy apreciable, 

no se tiene potencial más vale no 

La principal novedad que nos pre- 

la publicidad, es la inclusión de los 
circo jugadores reglamentarios en el 
terreno de juego, teniendo cada uno de 



programa que seguir 



quedará inmóvil. Vamos bien, desde 
luego. 

Encima, el sistema de control del 
jugador que dominamos es poco más 



roso adversario 
a, sin el balón ; 



La representación gráfica del juego 



tinguibles entre sí. No sabes quién 
eres, no sabes quiénes son ellos, no 
sabes lo que estás haciendo y al final te 
enteras de que te han hecho una 
personal, algo muy habitual también 



No dudamos de que las intencione 
de los programadores de este Drazei 
Petrovic Basket fueran buenas, y d. 
hecho las innovaciones que se apuntai 
no son nada desdeñables, pero se h. 



DRAZEN PETROVIC BASKET 

PRIMERA IMPRESION: ¿Qué so 

SEGUNDA IMPRESION:' ¡Ah, so 



I Y EN VISTA. DEL EXITO DEL ESPECIAL BATMAN EN ESTE NU-I 
1 MERO OS OFRECEMOS UN NUEVO VALE DESCUENTO PARA 
CUALQUIERA DE LOS JUEGOS COMENTADOS EN ESTA SEC- 

nM^pP^HHBp^HHIMMippH CION DE LA| 
-1 ^ n = t c i > i | J H i ■ t*J liilf^N 

| MEGA GAMES, FERRAZ 59, 28008 MADRID (TEL. 
1 DESCONTARA" 

DOS, 375 PTA! 
| PASANDOTE I 

TU PEDIDO, DU 



LA TIENDA 



■ARTICULOS PERIODISTICOS — por Pau Soler i Pía 



EXTRASCREEN 



En programas un poco sofis- 
ticados, se hace difícil utilizar 
screen 1, pero trabajar en 
screen 2 no siempre es posible. 
No estaría nada mal poder 
combinar las cualidades de uno 
con las del otro. Y ésto no es 
nada difícil. Nada mejor para 
demostrarlo que hacerlo. 



. la VRAM de screen2. En ésta, 

(supongo que ya conocerás el funcio- 
- miento de screenl), y además empie- 
n en la misma dirección, pero no 
la misma función 



TGP (tabla generadora de modelos o 
de patrones, es lo mismo), donde se 

el primer punto de la pantalla (esqu' 



dirección de esta tabla. Si también 
iluminamos el quinto punto (coorde- 
nada 0,4) encontraremos en la misma 
dirección el valor 10001000. O sea, que 

E !^ rimer byte de esta tabla^ como 

coordenad™7ÓVo,7) CO An S ora n bien, el 
ñgnientedato que encontramos en la 



que la anterior (6Ks), por lo que es fácil 
deducir que a cada byte de la tabla 



indica el color de tinta y la m 

inferior el de fondo. 

Tabla de modelos (6144-6911) 



se tomen las definiciones de un; 
interesa que ios datos que hay er 
pantalla (c¡ue si hay un 1 se ilumine 



lera correlativa. Es decir, lo que se 
: es que coincida el primer cuádra- 
le 8x8 píxels con las ocho primeras 
niciones, el segundo con las segun- 
.. Si por ejemplo cambiamos el 
primer dato de esta tabla, que es 0, por 
1, en la esquina superior izquierda de la 
pantalla aparecerá una copia de lo que 



definiciones de la TGP, 
segundas (direcciones 8-15). 



ía el 256, después el 257. 
es ¡mp<" :L '- 



dTkTGp 1 en ?a "dirección °20' 



n de la dirección 2568 a la 2575 



255, el siguiente dato que encontramos 
vuelve a ser 0, la TGP del cual empeza- 
ría en la dirección 4096. 



n incluyo sus direcciones: 



de screen2 puede ser complicado, 
poco de calma. Entenderlo es vital para 

EXTRASCREEN 



velocidad de screenl con la capacidad 
de screen2, es decir, poder conseguir 
efectos como utilizar 16 colores dife- 
rentes para cada carácter de screenl, y 
que en una parte de la pantalla salga 
con unos colores, y en otra de otros, 

He preparado una rutina en I 



comando CMD para ampliar las 
tracciones del MSX BASIC, es d 
una vez hayas hecho DEFUSR = 
&HD395:A = USR (0) podras 11 
a las rutinas con: CMDEXS, 
CMDCOL, CMDTVP. Como ve ' 
rutinas no interfieren la zona del disco 






ñ 


HS4 


LEnQTH 

>n i um 

■ IBTH 
■EISKT 


9. 81 m 

3. 52 m 
S.73 ■ 
■ 8, SOOM 



>. Se trata de preparar lo; 
J VDP para trabajar er 



_ - la TGP er 
los gráficos referentes 
tuviésemos los patrones ( 



están preparados los registros del VDP 
para trabajar en scree2, tenemos una 
tabla de color de 6K, lo que significa 8 
bytes de color por carácter, lo que 
ignifica 16 colores por carácter (cada 



byte 2 colores); p 



o al poderse utiliz; 



cnl s, 



is de uno, pero se ha de 



CMDEXS 

Bueno, paso a explicar con un poco 
de detalle la rutina CMDEXS. Para 
realizar ésto de cambiar los registros, 
preparar la VRAM... nos ayudaremos 
de la BIOS. La rutina ubicada en la 
dirección 6F se encarga de realizar un 
screenl, cambiando los registros del 
VDP y preparando la VRAM para 
screenl. También pone a 1 la posición 
SCRMOD (FCAF) con lo que le 
indicamos al BASIC que estamos en 
screenl. Después llamamos a la direc- 



preparar los registros del VDP para 
trabajar en screen2, pero no cambia la 
VRAM ni la posición SCRMOD. Con 



>s hecho 1( 
D está realizada par 



VRAM está prej 

VRAM de scree, 
de la TGP sobr< 
4095, que result 



>ara que puedan 
:s normales (le- 



la pantalla. Pr 
s que preparar 



Cuando tú er 

tecleas screenl el ordenador prepa 
TGP con los datos que tiene 
ROM. Estos datos empiezan 



^TGP. 



encarga de definir el carácter 255 d< 
dos segundas TGP's, para que sirv; 
cursor. Obviamente, este cursor 
realizará la inversión de caractere: 
cambiará de tamaño al puls 
las dos mitades inferiores i 



INSei 



CMDEXS, desde el BASIC podrei 
operar como si estuviéramos 
screenl. El BASIC cree que está 



Color del MSX-BASIC y como uno se 
imagina sirve para cambiar el color de 
tinta, el de fondo y el del borde de la 
pantalla. Es fácil comprender que el 



D3AB 
D3AD 
D3B0 
D3B3 
D3B6 
D3B9 
D3BC 
D3BF 
D3C2 
D3C4 



3B38 

CD4100 

CD6F0O 

CD7EO0 

21BF1B 

110010 

010008 

CD5C00 

3EF4 

210020 



D3CA CD5600 

D3CD 21F80F 

D3D0 3EFF 

D3D2 010800 

D3D5 C5 

D3D6 CD5600 

I D3D9 21F817 

I D3DC Cl 

I D3DD CD5600 



I D3E5 1194D4 

I D3E8 CD4FD4 

I D3EB 3B2B 

I D3ED CD63D4 

I D3F0 87 

1 D3F1 87 

I D3F2 87 

I D3F3 87 

I D3F4 F5 

'5 CD7ED4 

I D3F8 3877 

I D3FA CD63D4 

I D3FD Cl 

I D3FE B0 

I D3FF 210020 

| D402 010018 

15 CD5600 

I D408 CD7ED4 

I D40B 383E 

I D40D CD63D4 

I D410 47 

| D411 0E07 

D413 CD4700 

D416 1833 



41B CD4FD4 



D423 
D424 
D427 
D42A 



200 
210 
220 



420 
430 
440 
450 
460 

480 
485 
490 
495 

500 COLOR: 
510 



790 

800 TVPOKE: 

810 

820 

830 

835 

840 

850 

860 



JR C, COLOR 

CALL &H41 

CALL &H6F 

CALL 8-H7E 

LD HL,7103 

LD DE, 4096 

LD BC.2048 

CALL &H5C 

LD A, 244 

LD HL.8192 

LD BC,6143 

CALL &H56 

LD HL.408B 

LD A, 255 

LD BC,8 

PUSH BC 

CALL &H56 



LD DE.INS2 



ADD 
ADD 



PUSH AF 

CALL COMA 

JR C, ERROR 

CALL DATO 

POP BC 

OR B 

LD HL.B192 



CALL &H56 

CALL COMA 

JR C , RET 

CALL DATO 



LD DE , INS3 



CALL &H542F 



D42D 3842 

D42F CD7ED4 

D432 3845 

D434 CD2F54 

D437 22BFD4 

D43A 7A 

D43B B7 

D43C 2033 

D43E 7B 

D43F El 

»0 110008 

D443 0603 

»5 CD4D00 

D448 19 

19 10FA 

D44B 2A8FD4 

D44E C9 

D44F 2A8DD4 

D452 0603 



D45C 10F6 

D45E 228FD4 

D461 A7 

D462 C9 

D463 CD2F54 

D466 7A 

D467 B7 



1020 

2000 RET: 
2010 

2020 COMP: 
2025 

2030 C0MP2: 

2040 

2050 

2060 

2070 

2080 SIGUE: 
2090 



HL.DE 

C, ERROR 
. COMA 

C , ERRÜR2 
. &H542F 

(FINTEXT) , 



CALL i 
ADD ^ 
DJNZ ( 



HL, ( INITEXT) 



bB FE10 

I D46D 228FD4 

D470 D8 

D471 2A8DD4 

D474 1E05 

D476 C36F40 

| D479 1E02 

)7B C36F40 

)7E 2A8FD4 

D481 7E 

D482 FE2C 

)4B4 2802 

1486 37 



)4BD 0000 

D4BF 0000 

?1 455853 

D494 434F4C 



2200 
2210 

2220 ERROR: 
2230 

2250 ERR0R2: 
2260 

2270 COMA: 
2280 
2290 
2300 
2310 
2320 
2330 Sil 
2340 
2350 
2360 ] 



IITEX1 
: INTEX1 



2380 INS1: 
2390 INS2: 
2400 INS3: 



"INTEXT) ,HL 
., ( INITEXT) 



■INTEXT) ,HL 



DEFS 2 

DEFM "EXS" 

DEFM "COL"- 

DEFM "TVP" 











C0MP2: 
DATO : 
ERR0R2: 



54178 - 

54296 - 

54347 - 

54356 - 

54393 - 
54408 - 
54415 - 
54420 - 



■ &HD463 

■ &HD479 

■ &HD488 
&HD4BF 

■ &HD494 



54245 - &HD3E5 

54341 - &HD445 

54351 - &HD44F 

54362 - &HD45A 

54385 - &HD471 

54398 - &HD47E 

54413 - &HD48D 

54417 - &HD491 

54423 - &HD497 



l FOR X=&HD395 TO &HD499 
I READ A:S=S+A:POKE X , A : NEXT 

I IF SO27180 THEN PRI NT " ERROR EN PATAS " : END 
i PRINT"Para grabar: " 
l PRINT"BSAVE"+CHR$(34)+"EXSCAR " +CHR$ ( 34 ) + "&HD395 . &HD499 1 
10 DATA 33,193,195,34,13.254.33,162,211,34,15,254.201 
.0 DATA 34,141,212,17,145,212,205,79,212,56,56,205,65 
!0 DATA 0,205,111,0,205,126,0,33,191,27,17,0,16 
10 DATA 1,0,8,205,92,0.62,244,33,0,32.1,255 
iO DATA 23,205,86,0.33,248,15,62,255,1,8,0,197 
.0 DATA 205,86,0,33,248,23.193,205,86,0,205,68,0 
¡0 DATA 24,102,17,148,212,205,79,212,56.43,205,99,212 

0 DATA 135,135,135,135,245,205,126,212,56,119,205,99,212 
¡0 DATA 193,176,33,0,32,1,0,24,205,86,0,205,126 
10 DATA 212,56,62,205,99,212,71,14,7,205,71,0,24 
10 DATA 51,17,151,212,205,79,212,56,89,205,47,84,213 

0 DATA 34,143,212,33,249,47,167,237,82,56,66,205,126 
:0 DATA 212,56,69,205,47,84,34,143,212,122,183,32.51 
10 DATA 123,225,17,0,8,6,3,205,77,0,25,16.250 
:0 DATA 42,143,212,201,42,141.212,6,3,26,190,40.2 
i0 DATA 55,201,35,19,16,246,34,143,212,167,201,205.47 
•0 DATA 84,122,183,32,7,123,254,16,34,143.212,216,42 

0 DATA 141,212,30,5,195.111,64,30,2,195,111,64,42 
;0 DATA 143,212,126,254,44,40,2,55,201,35,34,143,212 
'0 DATA 201,0,0,0,0,69,88,83,67,79,76,84,86,80 



EJEMPLO 



10 CMDEXS 

20 FOR 1=8192 TO 10240 STEP 8 

30 FOR T=0 TO 7 

40 READ A 

50 CMDTVP I+T.A 

60 NEXT 

70 RESTORE 

80 NEXT 

90 DATA &h6f ,&h8f ,&h9f ,&Hef ,«,H3f ,&h2f ,&hcf ,&haf 



NOMBRE : UNDEADLINE FORMATO : disquette 

COMPAÑIA: T&E SOFT MSX:2' generación y Plus 



TIPO: Aventuras 




NOMBRE: GOLVELLIUS 
COMPAÑIA: COMPILE 


FORMATO: (3) disquette 
MSX: 2' generación 






TIPO: Aventuras 






ESPERABAI 



ALBUM ESPEC: 
SEGUNDA EDICION PARA COI 
DE LOS NUMERO] 
•POR SI 





ESPECIAL MEGA] 
m ALBUM QUE CONTIENE 
'"".OS 7, 8, 9, 10. 
POR SOLO 695 PTAS. 



PARA ESTAS FIESTAS NAVTDFÑAj 
BUSCADLOS EN LOS QUIOSCOS 
ANTES DE QUE SE AGOTEN, 
SOOWCIONE^^ 



UTILIDADES 



■ Por Pere Baño- 



FM-PAC 

PANA AMUSEMENT 
CARTRIDGE 



e de LASP nos 
ha llegado esta maravilla 11 
mada FM-PAC. De la casa 
PANASOFT y en formato cí 



d p r u e no o 



los pelos de punta a más 



Hi 



X era el SCC de 

KONAMI, con sus ocho vo- 
polifómcas (LSI); pues bien, ahora, 
PANASOFT ha puesto el dedo en la 

producto que incorpora 9 voces polifó- 
nicas (una más que KONAMI), con la 

indistintamente con programas de dife- 
rentes compañías (casi todas), eso sí 
que lleven ta marca [MSX-MUSIC] o 
[MSX-AUDIO], puesto que sino la 



M°MSXde 
ra y de segunda generación. ¡Os 
ía tener un MSX2 con sonido de 
+ ? Pues adelante con él. Os 



ro PSG.en un 

emás incorpora un programa pre- 



trucciones del BAS1 
música^de un MSX 

grabar la partida a i 
miarla en cualquie. 

nombre de S-RAM* Pero 
más detalle cada una de 

BASE 1 



me amplía las ins- 
SIC y permite usar 



o que se puede llegar 
del MSX2+ (siempre 



Así por ejemplo se siguen conser- 
vando las instrucciones básicas como 
SOUND, PLAY o hasta BEEP y 

pueden ser MUSIC, PITCH, TRANS° 
POSE, VOICE o muchas más. Esta 
extensión del BASIC se conoce como 
"FM sound extended BASIC" o más 
comúnmente [MSX-MUSIC] que es 
como lo encontraremos en las carátulas 
de los programas que lo incorporen. 
Esto no quiere decir que si no se 

no 'funcionen, sino que sonará tal cual, 
es decir, con tres canales en vez de 
nueve. Veamos a grandes rasgos para 
qué sirve cada una de las instrucciones. 

MUSIC 

Esta instrucción Done en marcha el 
[MSX-MUSIC] y 



r. Es el primero qu< 



. El u 



-CALL MUSIC [(<MODO>[,0 



-PITCH: Este comando marca la 
velocidad con que se ejecuta el ritmo, 
la melodía, en definitiva, cualquier 
sonido que suene en ese programa. 
Ejemplo: CALL PITCH (n) 
(n) puede ir desde 410 hasta 459. Si no 



los Hz. Si está en 450 son 450 Hz. 

-PLAY: Esta es una de las instruc- 
ciones más complicadas de uso. Sirve 

canales que le indiquemos. 
Ejemplo: PLAY#n, "CD", "EF", 
"GA" 

(n) puede ser 0, 2 ó 3, y determina el 
modo. Aquí las notas siguen funcio- 
nando igual que en BASIC sin expan- 
dir. Van desdé A hasta G, o desde Do 
hasta Si. Dentro de la instrucción 
PLAY.que aquí he resumido, hay un 
gran abanico de posibilidades. Cada 
una de las instrucciones que en éste 
comando podemos escribir están den- 



-TEMPER: E: 

nelodía. Hay 21 



indicar a PLAY 
, tempo, etc.. 
¡tracción deter- 



tes que podréis en 
tablas que se adjuntan al fina 
' CALL TEMPER (n) 



-VOICE: Esta in 



>n determi- 



cada canal. También hay una t: 
63 instrumentos diferentes. 
Ejemplo: CALL VOICE (| 

[@n2] [@n9]) 

[@nM] determina cual de los i 
tramemos está sonando por ese _ _ 
Si no se pone nada, CALL VOICE 



MSX, pero para hacerlos servi 
mos ^que programarlo nosot 



o y hacer RUN se podrá escuchar un 

Dentro de esta primera base está la 
:uestión que se refiere a los programas, 
-o bueno que tiene el FM PAC es que 
:onvierte los sonidos de^ un juego 

ugando, -por poner un ejemplo- con 
:1 programa FEEDBACK (de T&E 
ioft), y en uno de los slots que lleva el 



le todos los juegos que el autor de 
artículo ha probado con este cartu- 
cho hay algunos que no rom 



FUNCIONA CON: 
-T&E SOFT 
-NAMCOT 
-COMPILE 
-ASCII 
-XAIN 
-POÑYCA 

NO FUNCIONA CON: 

-KONAMI 

-TAITO 

-SEGA 



generación nacionales, aunque P eso sí, 



BASE 2 

sistema S^RAM que 



soporte magnético. En él podemos 
grabar toda la información o DATAS 
de un juego hasta que llenemos los 
ocho sub-slots de que dispone. 
S-RAM funciona del siguiente mo- 



momento determinado, al cambio de 
fase o de nivel, nos aparecerá un 
pequeño menú en el que se nos pre- 
guntará si deseamos grabar la partida o 

otro submenú en el que deberemos 




in PAC a otro. Eso en el caso de 
que tengamos, por lo menos, dos 
PACs. 

DELETE FILE.- Este comando sir- 
ve para borrar ficheros del disco, que 
no queramos. Si se da el caso que 
hemos pasado un fichero del PAC al 
disco y luego al cabo del tiempo ya no 
queremos conservarlo, con esta ins- 
trucción podemos borrarlo. Antes de 
dar la conformidad de borrar nada, 



SLOT.- Este último comando nos 
indica el slot sobre el que tenemos el 
FM PAC, y si el slot del PAC com- 

BGM- Este último punto no son 
más que una serie de melodías que han 
sido previamente grabadas, que a mo- 
do de demo, sirven para ver lo que se 
puede llegar a hacer con este FM PAC. 
Además esta música es la que se oirá 

por lo que si escuchar una de ellas se 



5 facilitan el trabajo 

esumen, que haya- 
FM PAC. A estos 

. 0 is se puede acceder 

íediante menús. Veamos el primer 



programitas qi 

EsCEl 



l.-Cleai 



l.-Delete file 



sirve para borrar DATAS grab 
con el FM PAC o cualquier otro 
de PAC. Dentro de él hay v 



COPY.- Este comando sirve para 
copiar ficheros de un lado a otro. Estos 
modos pueden ser: de PAC a PAC, d( 
PAC a íloppy disk y de floppy a PAC. 

En este comando hay que tener 
especial cuidado, si se tiene más de ui 
PAC, ya que deberemos de especifica 
a cuál, o de cuál queremos copiar. El 
este caso el ordenador ya se encargará 
de hacemos la pregunta. 

CHANGE.- La utilidad de es 
comando es un poco relativa. Este sin 
para intercambiar (swap) los fichen 



FINAL 

En resumen, es un programa 
una vez lo hayáis usado un par de 
veces, ya no querréis deshaceros de él, 
ya que el cambio se nota mu ' 
Además siempre hay esa curiosida 
saber cómo sonará el programa 
nos hemos comprado hoy, si le p 
mos este nuevo complemento, o de 



por e7emp°o S e° SCCde KONAmT°si 



antes que en cualquier otro programa. 

UevaríTun aira a la originalidad, ' " 
diez al sonido y un seis a los gráf 



tilidad no lo requiera. Por lo 




UN LIBRO PENSADO 
PARA TODOS LOS QUE 
QUIEREN INICIARSE 
DE VERDAD EN LA 
PROGRAMACION BASIC 

Construcción de programas. El po- 
tente editor todo pantalla. Constan- 
tes numéricas. Series, tablas y ca- 
denas. Grabación de programas. 
Gestión de archivo y grabación de 
datos. Tratamiento de errores. Los 
gráficos del MSX. Los sonidos del 
MSX. Las interrupciones. Introduc- 
ción al lenguaje máquina. 




Y ADEMAS PROGRAMAS 
DE EJEMPLO 

Alfabético. Canon a tres voces. 
Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. 
La Flauta Mágica de Mozart. Scra- 
ple from the apple & Donna Lee. The 
entretainer. Teclee un número. Ca- 
lendario perpetuo. Modificación 
Tabla de colores SCREEN 1 . Rec- 
tángulos en 3-D. Juego de caracte- 
res alfabéticos en todos los modos. 
Juego Matemático. Más grande más 
pequeño. Póker Breackou' Apoca- 
lypse Now El robot saltarín El ar- 
chivo en casa. 



Deseo me énvíen el libro Los secretos del MSX. para lo cual adjunto talón de 1 500 otas a la orden de 1 
MANHATTAN TRANSFER. S.A. importante: No se hace contra reembolsos. 

Nombre y apellidos i 

Calle n.° Ciudad CP ! 

Este boletín me da derecho a recibir los secretos MSX en mi domicilio libre de gastos de envío o i 

cualquier otro cargo. i 

importante: indicar en el sobre MANHATTAN TRANSFER. S.A ¡ 

«LOS SECRETOS DEL MSX» 1 

Roca i Batlle. 10-12 Bajos-08023 BARCELONA 



Programa ■ 



i Por Antonio Cano Morcillo . 



GOLLIWOG'S 
CAKE-WALK 



Uno de nuestros grandes ma< 
la música en MSX, Antoni. 
nos vuelve a sorprender c 
adaptación de la obra de D 



'= BOLLIWOG'S CAKE— WALK ( Debussy ) 



Por Antonio Cano Morcillo 



M Para MSX-CLUB I" 



•PRESENTACION ACM 

CLS : C0L0R15 , 1.1: KEYOFF : SCREEN2 , 
> : COLORI 5 ,1,1: F0RL=1T032 
) READA7. 

> SA*=SA*+CHR*( A7.) :NEXTL 
160 SPRITE*(0)=SA* 

) DATA 4,10,10,10,21,21,21,42 
180 DATA 42,42,78,64,95,160,160,160 
190 DATA 31,16,23,20,20,20,20,148 
200 DATA 148,148,84,84,84,183,128,2 
55 

> F0RL=1T032 : READB7. : SB*=SB*+CHR* ( 

> NEXTL:SPRITE*( 1 )=SB* 
) DATA 246,6,245,5,5,5,5,5 
) DATA 5,5,5,5,5,255,0,255 
) DATA 6,6,10,10,154,154,106,106 
) DATA 106,10,10,10,11,8,8,15 
) F0RL=1T032 : READC7. : SC*=SC*+CHR* ( 

) NEXTL:SPRITE*(2)=SC* 
) DATA 0,0,0,1,1,1,1,1 
) DATA 1,1,3,5,9,17,55,45 
) DATA 0,0,128,192,64,64,192,128 
) DATA 128,0,0,0,0,128,240,56 
) F0RL=1T032 : READD7. : SD*=SD*+CHR* ( 



D7.) 

340 NEXTL: SPR I TE* ( 3 ) -SD« 

350 DATA 105,81,81.65,49,31,15,1 

360 DATA 1,1,1,1.3,6,0,0 

370 DATA 8,4,4,4,12,24,224,0 

380 DATA 0,0,0,0,0,0,0,0 

390 LINE(107,82)-(160,110) . 6 , BF 

400 LINE(102,77)-(165,115) ,6,B 

410 F0RQA=1TÓ113STEP4 

420 PUTSPR I TE2 , ( QA+30 , 80 ) , 3 , 2 

430 PUTSPR I TE3, (256-QA, 96) ,3,3 

440 NEXTQA 

450 F0RQB=1T088STEP2 
460 PUTSPRITEO. (112.QB) ,7,0 
470 PUTSPRITE1, (12B.QB) ,7,1 
480 NEXTQB 

490 FORTM=1T01000:NEXTTM 
500 '===================== 

510 ' PRESENTACION PROGRAMA 
520 '===================== 

530 CLS : C0L0R15 , 1 : SCREEN2 , 2 : OPEN"GR 
P : " AS#1 : COLORI 5 ,1,1: SPR I TE* ( O ) =SC* : 
SPR I TE* ( 1 ) =SD* : SPR I TE* ( 2 ) =S A* : SPR I T 
E*(3)=SB* 



540 L 



(255, 1 



550 LINE(5,42)-(250,135) ,5,BF 
560 DRAW"C3BM10,80E32R16L16G32R16E1 
6L8BM30 , 80E32R16G32L16BM50 , 80E32G32 
R16BM70 , 80E32G32R16BM90 , 80R16L8E32L 
8R16BM110,80R16E32G32LBE16G16L8E32B 
M130 , 80R16E32L16G32BM1 50 , 80E32R16L1 
6G32R16E16L8BM210,48G8BM190,80R16E1 
6L16E16R16" 

570 DRAW"C11BM50,130E32R16L16G32R16 
BM70, 130E32R16616L16R16G16BM90.130E 
32G16R16L16D16BM110,130R16L16E16R8L 
8E16R16C8BM146,114R14C9BM150,130R16 
E32G32LBE16G16L8E32" 

580 DRAWC9BM170 , 130E32R16G16L16R16 
G16BM190,130E32G32R16BM210,130E32G1 
6R16L16D16'" 

590 C0L0R6:PRESET(30,140) :PRINT#1, 1 
from "+CHR*(34)+"Children's Córner" 
+CHR*(34) 

600 LINE(40,150)-(192,166) ,9,BF 



610 C0L0R15 : PSET ( 50 , 155 ) : PRINTttl , " b 
y C laude Debussy" 

620 LINE(45,152)-(187,164) ,14, B 
640 ' MUSICA 

660 PLAY"T100L16" , "T100L16" , "T100L1 

670 A*="S1M400005B-A-R16B-F8B-8A-F8 
E-04B8R16R16R16A-FE-03B8R16R16R16A- 
FE-Q2B803GR16R2" 

680 A2*="S1M400004B-A-R16B-F8B-8A-F 
BE-03BBR16R16R16A-FE-02B8R16R16R16A 
-FE-aiB8B-R16R2" 

690 B*="R16R1603B-R16R16R16B-B-R16'R 

16B-R16R16R16B-R16R16R16B-B-R16R16B 

-R16R16R16B-R16R16R16B-R16" 

700 B2*="02B-R1603E-R1602B-R1603E-E 

-G2B-R1603E-R1602B-R1603E-R1602B-R1 

6Q3E-E-G2B-R1603E-R1602B-R1603E-R16 

□2B-R1603E-R16" 

710 B3*="V12G2E-R1603BR1602E-R16Q3G 
R1602E-R1603GR1602E-R1603GR1602E-R1 
6Q3GR1602E-R1603GR16G2E-R1603GR1602 
E-R1603GR16" 

720 C*="V1304B-A-E-B-FR16B-R16A-F03 

B04E-03BR1604E-R16S1M900003B-B-V13R 

16Q4C03B-R16V1504B-R1603B-R16R16R16 

R16R16R16R16V12B-A-R16B-04CR1603A-R 

16B-A-R16B-BR16A-R16V14B-GR16FE-R16 

DR16CR1602GR1603CR16DR16" 

730 C2*="S1M4000L1602B-R1603A-R1602 

B-R1603A-R1602B-R1603A-R1602B-R1603 

A-R1602B-R1603GR1602B-R1603GR1602B- 

R1603GR16G2B-R1603GR1602B-R1603GR16 

02B-R1603GR1602B-R1603GR1602B-R1603 

GR16R8" 

740 C3*="V12L1602E-R1603FR16Q2E-R16 

03FR1602E-R1603FR1602E-R1603FR16Ü2E 

-R16Ü3FR1602E-R1603FR16Ü2E-R1603FR1 

602E-R1603FR1602ER1603FR1602E-R1603 

FR16D2E-R1603FR1602E-R1603FR1602B-G 

R16FE-R16DR16CR1601GR1602CR16DR16" 

750 D*="V1404B-A-E-B-FR16B-R16A-F03 

B04E-03BR1604E-R1603S1M9000B-B-R160 

4V15C03B-R1604B-R1603B-R16R16R16R16 

R16R16R16S1M7000B-B-V11Q3A-V12G4C03 

B-R16V1304D-R16E-R16FR16V14E-R16G-R 

16S1M9000FFV13R16GV15FR1605DR1604B- 

406B-8R8" 

760 D2*="L1602B-R1603A-R1602B-R1603 
A-R1602B-R1603A-R1602B-R16G3A-R16G2 
B-R1603GR1602B-R1603GR1602B-R1603GR 
1602B-R1603GR16D-R16G-R16D-R16GR16D 
-R16G-R16D-R166-R16R16R1604ER16E-R1 
603AR16Q4D405B-8R8" 

770 D3*="L1602E-R1603FR1602E-R1603F 
R1602E-R1603FR1602E-R1603FR1602E-R1 
6Ü3FR1602E-R1603FR1602E-R1603FR1602 
E-R1603FR1602G-R1603D-R1602G-R1603A 



-R1602G-R1603B-R1602G-R1603BR16R16R 

1604D-R16CR1603FR1602B-4aiB-8R8" 

780 E*="V1204E-FFV14GFR16V12E-R16V1 

3FFFF06B-B-R16R16V1204E-V13FFV14GV1 

3FR16E-R16FFE-E-V14FFB-B-V12E-E-E-E 

-E-E-E-E-E-E-E-E-E-E-E-R16V11E-E-E- 

E-E-E-E-E-" 

790 E2*="S1M400003B-R1604B-R1603B-R 
1604B-R16Q3B-R1604B-R16Q3B-R16Q4B-R 



1604B-R16Q3B-R16V1204GG03A-A-A-A-A- 
A-A-A- A-A- A-A-A- A-A --A-GGGGGGGG " 
800 E3*="S1M400003A-R1604A-R1603A-R 
1604A-R1603A-R1604A-R1603A-R1604A-R 
16Q3GR1604GR1603GR1604GR1603GR1604G 
R1603GR1604E-R1602B-G3CR16DCR1602B- 
R16B-03CR16DCR1602B-R16B-03CR16DCR1 
602B-R16" 

B10 F*="S1M400002R16B-G3CDCR1602B-R 

16V1204E-V13FFV15GV13FR16V12E-R16V1 

3FFFFD6B-B-R16R16V1204E-FFV15GFR16V 

12E-R16FFE-E-V13FFV14B-B-" 

820 F2*="S1M4000R1601B-02CDCR1601B- 

R16G3B-R1604B-R1603B-R16Q4B-R16G3B- 

R1604B-R1603B-R1604B-R1603B-R1604B- 

R16G3B-R1604B-R16Ü3B-R1604B-R1603B- 

R16V1204GG" 

830 F3*="S1M4000R16R16R16R16R16R16R 
16R1603A-R1604A-R1603A-R1604A-R1603 
A-R1604A-R16D3A-R1604A-R1603GR1604G 
R1603GR1604GR1603GR1604GR1603GR1604 
E-R16" 

840 G*="V1405B-A-A-B-FFB-B-A-FFE-04 
V15BBBBR16V13A-FE-Q3BBV15GGV12R16R1 
603B-B-R16R16B-B-R16R16R16R16R16R16 
R16R16R16R16B-B-R16R16B-B-R16R16R16 
R16R16R16R16R16R16R16B-B-R16R16B-B- 
R16" 

850 G2*="V1304E-E-E-E-E-E-E-E-E-E-E 
-E-R16RÍ6RÍ6RÍ6fiÍ6RÍ6RÍóRi6RÍ6R16Q3 
DDR16R16S1M4000E-R1602B-R1603E-R160 
2B-R16R16R16R16R16R16R16R16R16E-R16 
02B-R1603E-R1602B-R16R16R16R16R16R1 
6R16R16R16E-R1602B-R1603E-R16" 

4000R1603A-FE-02BR1602B-R16R16R1603 
GR1602E-R1603GR1602E-R16R16R16R16R1 
6R16R16R16R1603GR1602E-R1603GR1602E 
-R16R16R16R16R16R16R16R16R1603GR160 
2E-R1603GR1602L4E-F" 

870 H*="S1M4000L8R804D-R8D-R8CR8FR8 
D-R8D-R8CR8FR8D— R8R8R8R8D— R8R8R8R8R 
8R8R803B-R8R804D-R8D-R8CRBFR8D-R8D- 
R8CR8FR8D-R8" 

880 H2*="SlM4000L802G-03B-02G-03B-0 
2G-03A-02G-04C02G-03B-026-03B-02G-Ü 
3A-02G-04CR802G-FE-D-R8R8R8R8G-FE-D 
-01BB-A-02G-03B-02G-03B-02G-03A-02G 
-04C02G-03B-Q2G-03B-02G-03A-02G-04C 
R8Q2G-FE-D-R8" 




é 

►v 


10 - 58 360 -180 720 - 0 
20 - 58 370 -240 730 - 5 
30 - 58 380 -12"? 740 - 23 
40 - 58 390 -204 750 -lié. 
50 - 58 400 -231 760 - 22 
60 - 58 410 -170 770 -168 
70 - 58 420 - 81 780 -161 
80 - 58 430 -130 790 -143 
90 - 58 440 - 16 800 -161 
100 - 58 450 -180 810 - 90 
110 - 58 460 -241 820 - 84 
120 - 58 470 -132 830 - 84 
130 - 58 480 -204 840 - 14 
140 - 58 490 -233 850 -215 
150 - 58 500 -170 860 -235 
160 - 58 510 - 77 870 - 31 
170 - 3 520 -192 880 - 16 
180 -180 530 -173 890 - 58 
190 -238 540 -175 900 - 58 
200 - 27 550 -249 910 - 58 
210 -204 560 - 5 920 -182 
220 -179 570 -147 930 -162 
230 - 61 380 - 65 940 -134 
240 -246 590 -207 950 -229 
250 - 90 600 -225 960 - 89 
260 -175 630 -216 970 -137 
270 -180 640 -158 980 -232 
280 -239 650 -196 990 - 99 
290 -176 651 -169 1000 -136 
300 -204 660 - 68 1010 -231 
310 -254 670 - 58 1020 - 59 
320 -243 680 - 58 1030 - 89 
330 - 69 690 -176 1040 - 68 
340 - 29 700 - 69 1050 - 70 
350 - 56 710 -148 1060 -211 


1070 -170 
1080 -172 
1090 -142 
1100 -213 
1110 - 58 
1120 - 58 
1130 - 58 
1140 -242 
1150 -233 
1160 -181 
1170 -255 
1180 -135 
1190 -233 
1200 -117 
121CT - 54 
1220 -180 
1230 -171 

TOTAL: 
16133 


SUSCRIBETE 

Suscribiéndote no sólo tienes la seguridad de tener todos los meses tu 
MSX CLUB Olí PROGRAMAS en tu casa sino que recibirás 12 
números pagando sólo 10 

Nombre y apellidos 




Ciudad Provincia 

D. Postal Telefono 

Deseo suscribirme por doce números a la revisia MSX CLUB DL PROGRAMAS a partir del número 

que pago adjuntando talón al portador barrado a U Roca i Batlle, 10-12 - 0802 5 Barcelorta 

Tarifas: España por correo normal Ptas 3.750,- 
Europa por correo aéreo Ptas 6.500- 
América por correo aéreo USA! 62- 
Importante: Colocar en el sobre: Departamento Suscripciones MSX CLUB. NO SE ADMITE CONTRAREEMBOLSO. 



890 H3*="V13L803D-D-V12D-D-V11D-D-D 

-V15AV13D-D-V12D-D-V11D-D-D-V15AV13 

D-D-V12D-D-V11D-D-V10D-D-R8R8R8R8R8 

R802BR803V13D-D-V12D-D-VHD-D-D-V15 

AV13D-D-V12D-D-V11D-D-D-V15AV13D-D- 

V12D-D-V11D-D-V10D-D-VVD-" 

900 I*="TB0V13LBRBR8R804FFFV15EV13E 

-T100S1M400005E-D-E-R8E-D-E-T80V13R 

BR8R8RB04FFFV1SEV13E-T100S1M400005E 

-D-E-R8E-D-E-R8R8" 

910 I2*="T80V12L8R803AAAAAV15B-V13B 
"100S1M400004BBBR8BBBTBOV13R8R803AA 
AAAAB-T100S1M400004B-B-B-R8B-B-B-R8 
R8" 

920 I3*="T80V11L802E-FB-V12AB-V13BV 
1503CV1302A-T100A-A-A-R8S1M400003A- 
A-A-T80V14R8R8RBR8D-D-D-D-V1302G-T1 
00G-G-G-R8S1M400003G-G-G-R8R8" 

) J*="T100V13L1604AAAA05V14FFV15A 
■A-A-G-G-E-G-G-FD-D-D-D-04A-V14BB 
B-V13D-D-D-D-D-D-D-D-03LBV12R8R8V13 
04FFFEE-S1M400005E-D-E-R8R8R8R8V130 
1FFFEE--S1M400005E-D-E-R8R8" 
940 J2*="T100V13L1603AAAA04V14FFV15 



D-03BBB-B-B-B-R16R16L803V12AAAAV13B 
¡-BS1M400004BBBR8R8V1303AAAAAAB-S1 
M400004B-B-B-R8R8" 

950 J3*="T100L16V14R16R16R16R16R16R 
16R16R16R16R16R16R1603D-D-D-D-D-D-D 
-D-V1203G-G-FFE-E-D-D-02G-G-6-G-L8R 
8RB02V13GGGGA-S1M400004G-FE-R8V1103 
3-FE-E-E-V13CC026-S1M400004G-FE-R8R 

960 K*="L16V1305D-D-D-D-V14AAV15BBB 
Í-B-V14FA-A-G-E-E-E-E-04B-05D-D-04 
BFFFG-E— E-E-E-V14E-E— E-E-V13E— E— E-E 
-V12E-E-E-E-V11E-E-E-E-V14B-V12A-A- 
V11B-B-V10E-E-E-E-V14B-V12A-A-V11B- 
B-V12D-D-D-D-D-D-D-D-V11D-D-D-D-V12 
B-V11A-A-V10B-B-D-D-D-D-B-V10A-A-V9 
B-B-" 

970 K2*="L16V13a4D-D-D-D-V14AAV15BB 
-B-V13B-B-A-A-G-G-FFE-E-D-D-03BB 
-G-6-G-G-G-G-S-G-V12S-G-G-G-G-G- 
G-G-V11G-G-G-G-G-G-G-G-V10G-G-G-G-R 
Í16R16R16V12G-B-G-G-G-G-G-G-V11FF 
FFV10FFFFV9FFFFFFFF" 

980 K3*="L16R16R16R16R16R16R16R16R1 
6R16R16R16R16V1402BBBBBBBBR16R16R16 
R16R16R16R16R16V13B-03D-D-02BD-D-D- 



D-D-V13B-03D-D-02BD-E-E-FE-E-D-D-\ 



:> L*="V1204E-FFV14GFR16V12E-R16V1 
3FFFF06B-B-R16R16V1204E-V13FFV14GV1 
3FR16E-R16FFE-E-V14FFB-B-V12EEEEEEE 
EFFFFFFFFV1103B-B-B-B-B-B-B-B-B-" 
1000 L2*="S1M400003B-R1604B-R1603B- 
R1604B-R1603B-R1604B-R1603B-R1604B- 
R1603B-R1604B-R1603B-R1604B-R1603B- 



R1604B-R1603B-R16V1204GG04C+C+C+C+C 
+C+C+C+03A-A-A-A-A-A-A-A-FFFFFFFFF" 
1010 L3*= ,, S1M400003A-R1604A-R1603A- 
R1604A-R1603A-R1604A-R1603A-R1604A- 
R1603GR1604GR1603GR1604GR1603GR1604 
GR1603GR1604E-R1602B03C+R16D+C+R160 
2BR16B-03CR16DCR1602B-R16B-03CR16DC 
R16D2B-R16" 

1020 M*=" V1304BBBBBBBBBBBB03BBBBS1M 

4000R1603A-FE-02BR1602B-R16R16R1603 

GR1602E-R1603GR1602E-R16R16R16R16R1 

6R16R16R16R1603GR1602E-R1603GR1602E 

-R16R16R16R16R16R16R16R16R1603GR160 

2E-R1603GR16R16R16R16R16" 

1030 N*="L16S1M400002BR16B-A-G-F03E 

-R16R16R16R16R16R16R16S1M2000E-" 

1040 N2*="L16S1M400001BR16B-A-G-F02 

E-R16R16R16R16R16R16R16S1M2000E-" 

1050 N3*="L16S1M2000R16R16R16R16R16 

R16R16R16R16R16R16R16R16R1601E-" 

1060 PLAYA* . A2* : PLAYB* , B2* , B3* : PLAY 

CS,C2*,C3* 

1070 F0RAH=1T095:PUTSPRITE0, (20, AH) 
,10,0:PUTSPRITE1, (20.AH+16) ,10,1:NE 
XTAH 

1 080 PL A YD* , D2* , D3* : F0RAH=1 TO 1 70 : PU 
TSPR I TE2 , ( 220 , AH ) , 3 , 2 : PUTSPR I TE3 , ( 2 
36, AH) ,3.3:NEXTAH 

1090 PLAYE* , E2* , E3* : PLAYF* , F2* , F3S : 

PL A YG* , G2* , G3* : PL A YH* , H2* , H3* : PL A Y I 

*, 12», I3*:PLAYJ*,J2*, J3* : PLAYK* , K2* 

, K3* : PLAYC* , C2* , C3* : PLAYD* , D2S , D3S : 

PLAYL* , L2» , L3* : PLA YF* . F2* , F3* : PLAYG 

* , G2* , M* : PL AYN* , N2* 

1100 IFPLAY(O) O0THEN1100 

1110 ' ===== 

1120 ' FINAL 

1130 ' ===== 

1140 CLS : SCREENO : COLOR , 1 : W I DTH37 
1150 CL0SE#1 

1160 L0CATE8, 12:PRINT"TE HA GUSTADO 

(S/N) ? :A*=INPUT*(1) 
1170 IFA*="S"0RA*="s"THENCLS:G0T011 
80ELSE1200 

1180 PLAY"06S10M20O0L4CEGL32CEG07C" 
, "06V13L4C32C64CEG06V15C" , "04V14L4E 
FDL32CCCC " : FORKJ = 1 TOSO : A= I NT ( RND ( 1 ) 
*15) :B=INT(RND(1)*15) : LOCATE , 12 : PR I 



KJ : CLS: COLORI 5, 4 



1190 COLORA,B:t 
4 : END 

1200 CLS : LOCATE , 1 1 : PR I NT " i NO SAB 

ES APRECIAR LA MUSICA!" 

1210 PRINT : F'RINT" Pues ahora, , esc 

uchala otra ves ! » :PLAY"03L64V14CCE- 

E-GGE-E-CBBBBV12BBBBV10BBBB" , "03L64 

V12CCCE-E-GGE-E-CBBBBV11B-B-B-B-V10 

AAAAV9A-A-A-" , "08L64V14E-V10E-F+V14 

F+AV10AV15BV12BV10B08B" 

1220 F0RJ=1T01000:NEXTJ 

1230 GOTO 530 



Programa ■ 



■Por L. E. Algaba Gaitanoa 



IMPROMPTU N.' 2 



Se trata del Opus 90 de Schubert. Un 
original programa de música que 

U "onstruwtón "de"^;*™! 



'=-IMPROMPTU NS 2- (Schubert) 
□pus 90 
Dr Luis E. Algaba Eaitano 

para MSX-CLUB 



150 ' PRESENTACION 

160 • 

170 CLS:K.EYOFF: COLOR 15, 1,1: 
2:C0L0R15,1,1 
180 F0RI=1T032 
190 READB"/. 
200 S*=S*+CHR* ( B7. ) 
210 NEXTI 
220 SPRITE*(0)=S* 
230 DATA 0,0,0,1,1,1,1,1 
240 DATA 1,1,3,5,9,17,55,45 
250 DATA 0,0,128,192,64,64,192,128 
260 DATA 128,0,0,0.0,128,240,56 
270 F0RI=1T032 
280 READC7. 
290 SJ*=SJ*+CHRs(C7.) 



310 £ 
320 



:ITE*( 1 ) 
I 105, E 



=SJ* 



1,3,6,0,0 
4,12,24,224,0 
5,0,0 



330 DATA 1 
340 DATA 8,4 
350 DATA 0,0 
360 FORI=1T032 
370 READD7. 
380 S2*=S2S+CHR*(D7.) 
390 NEXTI 

400 SPRITE*(2)=S2* 

410 DATA 1,1,2,2,5,5,10,10 

420 DATA 20,20,40,40.80,95,128,: 

430 DATA 64,64,128,128,0,0,0,0 

440 DATA 0,0,0,0,0,255,0,255 

450 F0RI=1T032 

460 READE7. 

470 S3*=S3*+CHR*(E7.) 

480 NEXTI 

490 SPRITE*(3)=S3Í 

500 DATA 1,1,2,2,5,5,10,10 



530 DATA 40,232,4,244,10,10,5,5 
540 LINE(90,120)-(128,70) ,15:F0RLL= 
1TD100:NEXTLL 
550 LINE(128,70)-(164,120) ,15:F0RLL 
=1T0100¡NEXTLL 

560 L INE ( 90 , 120 ) — ( 164 , 120 ) , 15 : FORLL 

=1T0100:NEXTLL 

570 PAINT(120,119) ,15 

580 FORKJ=1T082STEP2 

590 PUTSPR I TEO , ( 1 20 , K J ) , 5 , O 

600 PUTSPRITE1, ( 120 , 16+KJ ) , 5 , 1 

630 PUTSPR I TEZ, ( KJ+20 , 100) ', 12,2 

640 PUTSPR ITE3, ( 135 , 182-KJ ) ,8,3 

650 NEXTKJ:DD*="04L64EC#03G#E04C#03 
6#EC#S#EC#02G#03EC#02G#EV14C#EG#03C 
#EG#04C#EG#05C#EG#06C#EG#04C#C#C#C# 
C#C#C#C#R6Q2C#C#C#V12C#C#C#V10C#C#C 
#V8C#C#C#V6C#C#C#V4C#C#C#V2C#C#C#V1 
C#C#C#" 

651 PLAY"V10XDD$; " , "V9R64XDD* ; " , "V7 
R64R64XDD* ; " 

660 F0RPQ=1T02500:NEXTPQ 



690 COLORI 5 , 6 : KEYOFF : SCREEN2 : CLS : CO 

L0R15, 14, 1 :OPEN"GRP: "AS#1 

700 FORAA=1T028:FORAB=1T020 

710 LINE(AA*10,0)-(AA*10+1',192) ,9,B 

F 

720 LINE(0,AA*7)-(256,AA*7+1) ,9,BF 
730 NEXTAA 

740 DRAW " BM 50 , 30C1 5R20F4D2R3F2U2E3U 
2R1E1R20F4D3R2E5U1R3E1R10F3D4R2D3E4 
U3E2U1R15D4F2R4F2U3E2U1E2R20F4D3R4U 
3E2U2R12" 

750 DRAW "F20R3D10L2G3H2D2B2R3F 3R3D 1 
0G3L4D3F4R2FD18G3L4G2R4F2R3D50L20U4 
H3D2G4L2DL23" 

760 DRAW"H3U4L2G3D2L2G2L15H8D4L2G4L 
25U3H2U2L2D3G2D2L15H4U2E2L4G3D5L20U 
4H3U2L3D3F2D2G2L25" 

770 DRAW"U40E4R2H3L2HU15R4E2U2E3L3G 
2L2H2U20E4R3F2U3H2L3H2L2U15E20" 
780 LINE(50,45)-(215,150) ,15,BF 
790 PAINT(80,155) .15 

800 DRAWBM50.30C14G17D3R8E2R4E2R8U 
8H2U2H2U2 " : PA I NT ( 45 . 45 ) , 1 4 



810 DRAW"BM210,30C14F20L8H2L4H2L4H4 
U2E2U6E2U2" : PAINT ( 215 , 40 ) ,14 
820 LINE(64,40)-( 185,66) ,5,BF:LINE( 
70,45) -(180,61) ,4,B 

830 COLOR 15:PRESET(75,50) :PRINT#1, 
"IMPROMPTU N92" 

840 C0L0R8 : PRESET ( 80 , 70 ) : PR I NT# 1 , " - 

Schubert -» 
850 LINE(40,114)-(223,147) , 3 , BF 
860 COLOR 15 i PRESET (40, 135) :PRINT#1 
. Algaba Saitano" :COLOR 2: 
PRESET (115, 120) :PRINT#1, "por" 
870 DRAW" BM120 , 100C13U2E2LE2R6BR2DF 
03LDLGL7ULULHU3RU2RUE5U2RU3LUGD25LD 

880 L 



920 PLAY"T130L16" , "T130L16" , "T130L1 

930 A1*="V805GB-A-SFE-DC04B-A-BFE-D 
C03B-04CDV6E-DE-V7ED#EV8FEFV9F#FF#V 
8GF#GV7A-GA-V8GB-A-GA-B-05CDE-F06C0 
5B-A— GFE-DC04B-05FE— DC04B— A— GFE-FGV 
'A-B-05CV10DE-F" 

="V703E-E-E-E-E-E-E-E-E-FFFF 



r FGGGGGGGGGDDDDDDDDDE-E 



Í-B-B-B-R604CCCCCCR6DDDDDDR60 
•B-B-B-" 

t*="V704G-B-A-G-FE-D-03BB-B04 
■A-G-E-G-FBB-A-G-FE-D-03BB-04 



1030 B4*="V702E-E-E 



03FFF04A-A-A-A-A-A-01B-B-B-02B-B-B- 
B-B-B-03E-E-E-04G-G-G-G-G-G-03A-A-A 
-04BBBBBB" 

1050 A5*="V804V9BV8FDV9B-V8FD05V9D0 

4V8A-F0SE-G-FE-D-04BB-A-FG-B-A-G-FE 

-D-03BB-B04DFV9BV8FDFD-03BB-04B-A-G 

-FE-D-03BB-B04DFVVBV8FDFD-03B04D-G- 

B-05V9D-04V8B-G-FG-EE-A-B05V9E-04V8 

BA-GA-G-FG-GA-B-B05D-E-F" 

1060 B5*="02B-B-B-B-B-B-B-B-B-03E-E 

-E-E-E-E-E-E-E-02G-G-G-G-G-G-G-G-G- 



B-BBBBBBBBB03D-E 



6B- 



C1*="03V7R6B-B-B-B-B-B-R6B-B-B- 
-B-R6B-B-B-B-B-B-R6B-B-B-B-B-B-R 
B-B-B-B-B-R604CCCCCCR6DDDDDDR603 



960 A2*="V1005SB-A-GFE-DC04B-A-GFE- 
DC03B-04CDV8E-DE-V9ED#EV10FEFV9F#FF 
#VBGF#GV9A-GA-V10GB-A-GA-B-05CDE-F0 
6C05B-A-GFE-DCDFE-DE-FGA-B-E-FGA-B- 
06CDE-F" 

970 B2*="V903E-E-E-E-E-E-E-E-E-FFFF 
FFFFFGGGGGGGGGDDDDDDDDDE-E-E-E-E-E- 



980 C2*="V9R603B-B-B-B-B-B-R6B-B-B- 
»-B-R6B-B-B-B-B-B-R6B-B-B-B-B-B-R 
6B-B-B-B-B-B-R604CCCCCCR6DDDDDDR603 
-B-B-B-B-" 

A3*="V8066B-A-BFE-DC05B-A-BFE- 
DC04B-05CDV6E-DE-V7ED#EV8FEFV7F#FF# 
V6GF#BV7A-GA-VBBB-A-BA-B-06CDE-F07C 
D6B-A-SFE-DC05B-06FE-DC05B-A-SFE-SF 
■-DC04B-A-F" 

1000 B3S="V703E-E-E-E-E-E-E-E-E-FFF 
FFFFFFSBBBBBSBBDDDDDDDDDE-E-E-E-E-E 
-E-E-E-02A-A-A-03A-A-A-A-A-A-02B-B- 
B-03B-B-B-B-B-B-E-E-E-04E-E-E-E-E-E 



1010 C3*="V7R603B-E 



-B-B-B-B-R6B-B-B 



TEST DE LISTADOS ■ 



10 - : 



2B0 - 1 550 -127 

290 - 61 560 -239 

58 300 -246 570 -228 

58 310 - 90 580 -217 

58 320 -175 590 -171 

58 330 -192 600 -245 

5B 340 - 3 610 -183 

58 350 -243 620 -178 

58 360 - 69 630 - 5B 

58 370 - 29 640 - 58 

■ 58 380 - 56 650 - 58 

• 58 390 -153 660 -173 

•244 400 - 83 670 -213 

■237 410 - 95 680 -169 

■165 420 -196 690 - 87 

■244 430 -254 700 -237 

-158 440 - 21 710 -245 

80 -144 450 - 69 720 - 53 

13 460 -199 730 - 62 

200 - 9 470 -217 740 -124 

210 -184 480 - 22 750 -197 

220 -255 490 - 98 760 -237 

230 - 46 500 - 58 770 -142 

240 - 41 510 - 58 780 - 57 

250 - 72 520 - 58 790 -196 

260 -170 530 -178 800 -242 

270 -188 540 -144 810 - 51 



Test de listados ■ 



1360 - 
1370 - 
1380 - 
1390 - 
1400 - 



1450 -147 



1640 - 
1650 - 
1660 -145 



H03B-B-B-B-B-B-E-E-E-04E-E-E-E-E-E 

. 1 30 C7*= " V7R603B-B-B-B-B-B-R6B- 
-B-B— B— R6B-B-B— B— B-B-R6B— B— B— B— B— B- 
R6B-B-B-B-B-B— R604CCCCCCR6DDDDDDR60 



1740 - 99 
1750 - 33 



.210 -206 



1770 -185 



1810 -255 



1600 - 
1610 - 
1620 - 
1630 - 



-B-B-B-B-B-B-B-R6D-D-D-D-D-D-R604BB 
BBBBÜ3R6D— D-D-D-D-D-R604BBBBBBÜ3R60 
5D-D-D-D-D— D-R6E— E— E— E-E— E-R6Ü3BBBB 
BB" 

1080 A6*="V805G-B-A-G-FE-D-04BB-A-B 
B— V7A— G— FV9E-V7DFV6A— BB-A— G— FV9E— ' 
DFA-BB-A-G-FV9E-V6DFV7A-B05D04B05DF 
DFG-V6A— BB-A— G— FV8E— V7DFA— BB-A— G— F 
8E-V6DFA— BA-V7BA-BV6A-BA-V5B-A-B— i 
B-A-B-A-B-" 

1090 B6*="V7Ü3B-B-B-B-B-B-R3V6BBBBB 



3B-B-B- 

1140 A8»= " V9D6GB-A-GFE-DCD5B- A-GFE 
-DC04B-05CDE-DE-V7ED#EV8FEFV9F#FF#V 
8GF#GA— GA— " 

1 1 50 B8*= " V803E-E-E— E— E— E-E-E-E— FFF 
FFFFFFGGGGGGGGGDDDDDDDDD " 
1160 C8S= " V6R603B-B-B-B-B-B-R6B-B-E 
— B-B-B- 

1170 A9*="V705GG-GA-GA-B-A-B-V8A-GA 
-B-A-B-06C05BD6CV9DC#DEDEF#EF#V10GF 
#GAGABABV1 107C06BÜ7CDCDEDEFE-D-C06B 
-A-GFE-DC05B-AB-06CDE-FG-B-(: 
-Q5BB-B06E-D-Ü5BB— A-G-FE-DFE-DG4BB- 
A-G-F05G-B-A-G-FE-D-04BB— BÜ5E-D-C 
B- A-G-FE-DFE-D03BB-A-G-F " 
1180 B9*="V7Q3D-D-D-D-D-D-D-D-D-V8C 

-B-B-B-B-A-A-A-A-A-A-A-A-A-B-B- 

□2A-A-A-A-A- 



1190 C9*="V603R6B-B-B-B-B-B-R6A- 
-A-A-A-R6V8AAAAAAR6V9GGGGGGR6GGGG66 

E-E-E-R603A-A-A-A-A-A-R6B-B-B-B-B-B 
E-E-E-E— Q2R6A-A-A-A-A— A-R6B- 



L200 D1*="V11Ü3E-FG-V13A-V11BB-A-C 
: E-FG-V13A-V11BB-A-G-FE-FG-V13A-V1 
ÍB-A-G-FV12E-FG-A-B-D4CDE-FV14G-G-G 
-G-G-G-R6B-B-B-B-B-B-R6" 
L210 E1*="V1002E-E-E-B-B-B-B-B-E 
:-E-B-B-B-B-B-B-E-E-E-B-B-B-B-B- 
L2E-FG-V13A-B-03V14CDE-FG-G-G-G- 
-R602G-G-G-G-G-G-R6" 



B-B-B-" 

1100 C7*="V703G-6-G-6-G-G-R602B-B-B 

6B-B-B-B-B-B-B-6-B-B-B-B-B-B-B-V5B- 
B-B-B-B-B-B-B-B-B-B-B-B-B-B-B-B-B-B 
-B-B-" 

1110 A7»="V805GB-A-GFE-DC04B-A-GFE- 
DC03B-Q4CDV6E-DE-V7ED#EV8FEFV7F#FF# 
V6GF#GV7A-GA-V8GB-A-GA-B-05CDE-F06C 
05B-A— GFE— DCDFE— DE-FGA— B-E-FGA— B-06 
CDE-F" 

1120 B7*="V703E-E-E-E-E-E-E-E-E-FFF 
FFFFFFGGGGGGGGGDDDDDDDDDE-E-E-E-E-E 



R6" 

1230 D2*= " V904BBBBBBR6BBBBBBR6V8BBB 
□5V9C#C#C#V8DDDV9C#C#C#C#C#C#C#C#C# 
V10F#F#F#F#F#F#F#F#F#DDDDDDDDDV8CttC 
#C#V9EEEV8C#C#C#V9DDDDDDDDD04V8BBBB 
BBR6BBBBBBR6BBB05V9C#C#C#VBDDDC#C#C 
#C#C#C#C#C#C#V9F#F#F#F#F#F#F#F#F#' 
1240 E2*="V803R6B04DF#03BBBR6B04C#G 
03BBBR1204D . R12E . R12D . R6C#F#A#C#C#C 
#R6F#A#05C#04F#F#F#R6DF#BDDDB . E . B . E 
. B . E . R6DF#BDDDR603V7B04DF#03BBBR6B0 
4C#G03BBB04R12D . R12E . R12D . R6C#F#A#C 
#C#C#R6V8F#A#05C#04F#F#F#" 
1250 F2*="V801BBB03DDDDDD01BBB03C#C 
#C#C#C#C#DDDC#C#C#02BBBF#F#F#03F#F# 
F#F#F#F#Ü2F#F#F#03A#A#A#A#A#A#02BBB 
03F#F#F#F#F#F#02G . 03G . 02E . 03E . 02G . 0 



3B . 02BBB03F#F#F #F#F#F#01 V7B . R1203DD 
DDDD01B . R1203C#C#C#C#C#C#DDDC#C#C#0 
2BBBF#F#F#03F#F#F#F#F#F#02F#F#F#03A 

1260 D3*="05DDDDDDDDDD4BBB05DDD04BB 
B05C#C#C#C#C#C#C#C#C#04V7AAAAAAAAAG 
GGG6GGGGFFFG#G#G#FFFF#F#F#F#F#F#R6V 
9F#F#F#F#F#F#R6V7F#FttF#F#F*F#F#F#F# 

FFFFFFFFF" 

1270 E3*="04R6DF#BDDDR12F# . R12F# . Rl 
2F# . R6C#FG#C#C#C#R603V6A04C#F#03AAA 
R6GB04DG3GGG04C# . 03G<* . Q4C# . 03G#04C# 
. 03G# . R603F#ft04C#03F#F#F#R6V9F#B04D 
□3F#F#F#R6V7F#A04C#03F#F#F#V6G#AB04 
V7C#DC#03V6BAG#" 

1280 F3*= "02BBB03F#F#F#F#F#F#02D . 03 

# . R1203V6F*F#F#F#F#F#01B . R1202BBBBB 

B02C#C#C#03C#C#C#02C#C#C#F#F#F#AAAA 

AA01V7BBB02BBBBBB01V6F#F#F#02AAAAAA 

C#C#C#03V7C#C#C#C#C#C#" 

1290 D4*="04F#F#F#F#F#F#R6V9F#F#F#F 

#F#F#R6V7F#F#F#F#F#F#F#F#F4*FFFFFFFF 

FF#F#F#F#F#F#F#F#F#05V9C#C#C#C#C#C# 

1300 E4*="03R6F#AD4C#G3F#F#F#R6VBF# 

ABG4V7C#DC#03V6BAG*R6F#AG4C#03F#F#F 
#R604V8C#FG#C#C#C# " 


F#F#F#F#F*DDDDDDDDDC#C#C#EEEC#C#C#D 
DDDDDDDD" 

1390 E7*="V703R6B04DF#03BBBR6B04C#G 
Q3BBBR1204D . R12E . R12D . R6C#F#A#C#C#C 
#R6F#A#05C#04F#F#F#R6DF#BDDDB . E . B . E 
.B.E.R6DF#BDDD" 

1400 F7*="V701BBBQ3DDDDDD01BBBD3C#C 
#C#C#C#C#DDDC#C#C#02BBBF#F#F#Ü3F#F# 
F#F**F#F#02F#F#F#03A#A#A#A#A#A#02BBB 

3G.02BBB03F#F#F#F#F#F#" 

1410 D8*="05V9EEEEEER6EEEEEER6EEEF# 

F#F#GGGF#F#F#F#F#F#F#F#F#BBBBBBBBBG 

GGGGGGGGV7EEEVBGGGV7EEEV9F#F#F#F#F# 

F#F#F#F#V7DDDDDDDDDCCCCCCCCC04A#A#A 

1420 E8*="04R6V8EGBEEER6EF#05C04EEE 
R12B . R12B . R12B . R6F#B05D#04F#F#F#R6B 
05D#F#04BBBR6GB05E04BBBR1205C# . R12C 
# . R12C# . R604F#A#05C#04F#F#F#R6V7DFt* 

1430 F8*="V802E.R1203GGGGGG02EEE03F 
#F#F#F#F#F#GGGF#F#F#EEE02BBB03BBBBB 
B02BBBQ4D#D#D#D#D#D# t 03EEEBBBBBB02G . 

#A#A#A#02V7BBB03F#F#F#F#F#F#02EEE03 
EEEEEE02F#F#F#03A#A#A#02F#F#F#" 
1440 D9*="04BBBBBBR6V9BBBBBBR6V8BBB 


1310 F4*="01F#F#F#G2AAAAAA01BBB02VB 
BBBBBB01V7F#F#F#Q2AAAAAA02C#C#C#G3C 
#C#C#C#C#C#G1F#F#F#02AAAAAAV8F . R120 
3FFFFFF" 

1320 D5*="04A#A#A#A#A#A#A#A#A#BBB05 

C#C#C#DDDC#C#C#C#C#C#C#C#C#F#F#F#F# 

F#F#F#F#F#V10D#Dt*D#D#D#D#D#D#D#V8EE 

EF#F#F#GGGF#F#F#F#F#F#F#F#F#DDDC#C# 

C#04BBB05V9C*tC#C#C#C#C#C#C#C#" 

1330 E5*="03R6A#04C#G03A#A#A#R1204D 

= R12E R12D = R6C#F#Attn#c**n#RAF#A#ri5C# 

04F#F#F#R6D#F#05C04D#D#D#R12G . R12A . 

R126.R6F#B05D04F#F#F#R12F#.R12F#.R1 

2F# . R6C#FG#C#C#C# " 

1340 F5*= " 02EEE03EEEEEEDDDC#C#C#G2B 
BBF#F#F#03F#F#F#F#F#F#Q2A# . R1203A#A 
#A#A#A#A*t02A . R1204CCCCCCÜ3GGGF#F#F# 
EEE02BBBQ3BBBBBB01B . 02B . C# . 03C#02D . 
03D . 02Ct*C#C#03FFFFFF " 

1350 D6*="04AAAG#G#G#F#F#F#V9G#G#G# 

G#G#B#G#G#G#V7FFFFFFFFFF#F#F#F#F#F# 

F#F#F#G3 V9SGGF#F#F#FFFR2 " 

1360 E6*= " D4R12C# . R12C# . Rl 2C# . R6036 

#04CD#G3G#B#G#R6V7FG#04C#a3FFFR6F#A 

□4C#G3F#F#F#V8B . 04D03A . 04C# . 03G# . 04 

C# . F#DC#02BAG#F# . R12" 


#BBBBBBR6V9BBBBBBR6BBBBBBBBB" 

14 50 E9*= " 03R6B04DF#03BBBR6V8B04EGG 

3BBBR6V7B04DF#03BBB04VBC#DEV9F#GFttV 

BEDC#R603V7BG4DF#03BBBR6V8B04EG03BB 

BR6V7B04DF#03BBB04V8C#DEV9F#GFttVBED 

C#R603V7B04DF#03BBBR6V8B04DF#03BBBR 

6B04DF#03BBB" 

1460 F9*="01BBB03DDDDDD02V8EEE03V9E 
EEEEE01V7BBB03DDDDDD02F#F#F#03F#F#F 
#F#F#F#01BBB03DDDDDD02V8EEE03V9EEEE 
EE01V7BBB03DDDDDD02F#F#F#G3F#F#F#F# 
F#F#01BBB03DDDDDD01 V8BBBÜ3DDDDDD01B 
BB03DDDDDD" 

1470 61*="G4V10DV8F#B03BBB04V10DV8F 
t*B03BBB04V10DV8F#B03BBB04A#A#A#A#A# 
A#R6A#A#A#A#A#A#A#A#A#V10E-V8G-B-03 
B-B-B-04V10E-VBG-B-03B-B-B-04V10E-V 
8G-B-03B-B-B-05V11E-E-E-E-E-E-Q6E-E 
-E-" 

1480 Hl*="03R6V8DDDR6DDDR6DDDR6B-04 
E-G-03B-B-B-R6V9B-04E-G-03B-B-B-R6E 
-E-E-R6E-E-E-R6E-E-E-02A-A-A-03E-E- 
E-E-E-E-" 

1490 I 1*="02VBBBB02BBB01BBB02BBBD1B 
BB02BBB01B-B-B-Ü3E-E-E-E-E-E-01V9B- 


2A . 01G#G#G#G3CCCCCC01 V7A . R1203C#C#C 

#C#C#C#01A . R12D2AAAAAA01 VBB . 02B . C# . 

03C# . 02C# . 03C# . 02F#F#F#R3 " 

1380 D7*= " V704BBBBBBR6BBBBBBR6BBBD5 

C#C#C#DDDC#C#C#C#C#C#C#C#C#F#F#F#F# 





B-B-03E-E-E-E-E-E-D1B-B-B-03E-E-E-0 
1B-B-B-03E-E-E-01B-B-B-03E-E-E-01V1 
0A-A-A-03FFFFFF" 

1500 G2*="V10E-E-E-05BBBBBBV9A-BA-V 



1520 I2*="FFF 



-V3A-A-A-V2A-A-A-V1A-A-A-A-A-A-A-A- 
A-" 

B05C#C#C#DDDC#C#C#C#C#C#C#C#C#V10DD 
DDDDDDDE-E-E-E-E-E-E-E-E-V904F . Ü5F . 
34G- . 056- . 04F . 05F . E-E-E-E-E-E-E-E-V 
L06BBBBBR6BBBBBBR6V9BBB06C#C#C#DDDC 
#C#C#C#C#C#C#C#C#" 

*0 Z 1*= " 03R6V8B04DF#03BBBR6B04C#G 
3BBR1204D . R12E . R12D . R6C#F#A#C#C#C 
#R6DFB— DDDR6E-G— B-E-E— E-03R6V9DDDR6 
G4V9R6E-6-B-E-E 
BQ5C#B04BBBR12D5D.R12E. 
#C#C#C#" 

1550 Y1*="V801BBB03DDDDDD01BBB03C#C 
#C#C#C#C#DDDC#C#C#02BBBF#F*F#03F#F# 
F#F#F#F#02B-B-B-03FFFFFF02E-E-E-03G 



03E-E-E-1 



5-01V9BBB03DDDDDD 



026BB03C#C#C#C#C#C#DDDC#C#C#02BBBF# 
F#F#03F#F#F#F#F#" 

1560 X2*="V1006DDDDDDDDDE-E-E-E-E-E 
-E-E-E-V9D . F . V10D . S- . V9D . F . E-E-E-E- 



-.V10E-.G-.V9D.F 



i- . V10E- . G- . V9D . F . E-t 



R12G- . R12F . R12R6E-S-B-E-E-E-R6B-06F 

A-05B-B-B-R6B-06E-6-05B-B-B-A- . R12G 

-.R12F.R12R6E-6-B-E-E-E-" 

1 580 Y2*= " V702B-B-B-03FFFFFF02E-E-E 



¡-B-B-B-B-E-E-E 
-B-B-04FFF03E-E 
-B-03B-E 



-B-B-B-B-B-B-í 



Í-02B- 



3-04FFFO3E-E-E-B-B-B-" 
1 590 X3*="' V1006A- . B . G- . B- . F . 07D . V12 
E-06V12BB-A-6-FV13E- . R12V12E-05BB-A 
-G-FV13E- . R12V12E-G4BB-A-G-FV13E- . R 
12V12E-03BB-A-G-FV14E- . R12T135S10M3 
120L604E-E-E-E-E-E-" 

1600 Z3*=" V10D5B . R12B- . R12G6D . R1204 
V11E-E-E-E-E-R16V13E-.V11R12E-E-E-E 
-E-R16V13E-.V11R1203E-E-E-E-E-R16V1 
3E- . V11R12E-E-E-E-E-R16V14E- . R12T13 



5S10M3120L603B-BB-BB-B" 
1610 Y3*="V1003A-A-A-B-B-B-04FFF03V 
11E-E-E-E-E-R16V13E- . VI 1R12B-B-B-B- 
B-R16V13B-.V11R1202E-E-E-E-E-R16V13 
E- . R12E-E-E-E-E-R16V14E- . R12T135S10 
M3120L602E-E-E-E-E-E- " 
1620 X4*="T135L16V1405DDDR6R6E-E-E- 
R6R6" 

1630 Z4*="T135L16V1404DDDR6R6B-B-B- 

1640 Y4*="T135L1602V13B-B-B--R6R6V14 
03E-E-E-R6R6" 

1650 PLAY"T130L16VB05B-B-B-XA1*; " , " 
T130L16R16R16R16XB1*; " , "T130L16R16R 
16R16XC1* ; " : PLAYA2* , B2* , C2* : PLAYA3* 
, B3* , C3* : PLA YA4* , B4* , C4* : PLAY A5* , B 
5* , C5* : PLAYA6* , B6* , C6* : PLAYA7* , B7* , 
C7* : PLAYAB* , B8* , C8* : PLAY A9* , B9* , C9 
*:PLAYD1*,E1*,F1* 
1660 PLAYD2* , E2* , F2* : PLAYD3* , E3* . F 3 
* : PLAYD4* , E4* . F4* : PLAYD5* , E5* , F5* : F 
LAYD6* , E6* , F6* : PL AYD7* , E7* . F7* : PLAY 
D8* , E8* , F8* : PLAYD9* , E9* , F9* : PLAYSU 
,H1«, I1*:PLAYS2*,H2*, 12* 
1670 PLAYA1* , Bl* , Cl* : PLAYA2* , B2* , C2 
* : PLAYA3» , B3* , C3* : PLAYA4* , B4* , C4* : P 
LAY A5* , B5* , C5* : PLAYA6* , B6* , C6* : PLA 
YA 7* , B7* , C7* : PLAYAS* , B8* , C8* : PLAY A 
9*,B9*,C9*:PLAYD1*,E1*,F1* 
1680 PLAY X1*,Z1*.Y1*:PLAYX2*,Z2*,Y 
2* : PLAYX3* , Z3* , Y3* : PLAYX4* , Z4* , Y4* 
1690 IF PLAY(0)<>0 THEN1690 
1700 ' 

1710 ' FINAL 



1730 CLS : COLORI ,1,1: SCREEN2 : COLORI , 

1740 CLOSE*l:OPEN"grp:"AS#l 

1750 CIRCLE(128,116) ,50,10, , ,1.23 

1760 PAINT(128,116) ,10 

1770 CIRCLE(115,95) , 12 , 1 , , , 2 . 9 : PA I N 

T(115,102) ,1 

1780 CIRCLE(141,95) ,12,1,, ,2.9:PAIN 

1790 LINE<117,143)-(139,143) ,1 
1800 LINE(65, 15)-(200.43) , 3 . BF 
1810 LINE ( 60, 10)-( 195,38) , B , BF 
1820 COLORI 5 : PSET ( 70 , 20 ) : PR I NT# 1 , " ¿ 

1830 AT*=INPUT*( 1 ) : IFAT*="S"ORAT*=" 
s"THENlB40ELSE1880 

1840 LINE(117,143)-(139,143) .10 
1850 CIRCLE(128,125) ,27,1,3.2,6.28 
1860 PSET(65,183):PRINT#l,"Have e 

1870 FORK J=1T01 500 sNEXTKJ ! CLS : SCREE 
NO:C0L0R15,4.4:END 
1B80 LINE(il7,143)-(139,143) ,10 
1B90 CIRCLE(137,191) ,52,1,1.5.2 
1900 FORK J = 1 TO 1 500 : NE X T K J : CLS : SCREE 
N0:C0L0R15,4,4:END 



msxclub 



CONCURSO 
DE ARTICULOS 
PERIODISTICOS 



INSERTAR 
EN EL ARTICULO 
A MODO DE CUESTIONARIO 

TITULO DEL ARTICULO 



BASES 



TEMATICA 

AUTOR (NOMBRE Y 
DOS APELLIDOS) 



D.N.I 

CALLE 

N" POBLACION . 

PROVINCIA 

BREVE RESUMEN 



. EDAD... 

..... bp"! 




liste fecha límite para el plazo 



PREMIOS 



). Manhattan Transfcr premiará en 
metálico al artículo ganador del 
concurso -el más votado por los 



FALLO Y 
JURADO 



ir de la editorial 
Manhattan Transfer hará una se- 
lección previa de los artículos a 

ganador queda en función de los 
votos de los lectores. Ambos fallos 
serán inapelables. 

11. Todo el material quedará en pro- 
piedad de Manhattan Transfer, 

12. No se mantendrá correspondencia 



ENSAMBLADOR^ M Por Eduardo Martínez ■ 

ARITMETICA 
DE 8 Y 16 BITS 
INSTRUCCIONES s^fei,^ 

__ — A _ restas), y las instrucciones de 

CAI HTO salt ° y subrutinas, profusa- 

_L/J_y i3xX.L# X V>^ mente ilustrados con ejemplos. 




SUMA Y RESTA CON 
ACARREO DE 8 y 16 BITS 



Estas instrucciones tienen en cuenta 
el Flag C, sumándose su valor sólo 




3 ADD A, B ; Sumamos 

4 LD (nn),A; Guardamos 

5 LD A, 0 ; Cargamos ¡ 



de C será sumado a . 
utilizaremos otra vez 

final. sT deseados s! 



listado 1 , veremos que de las ün< 

" ' :mos algo similar, aunque en 
a si el resultado excede de 
70.000 seguirá siendo correcto. 



EL COMPLEMENTO A DOS 



>mprender el funcionamiento de 
:sta. Como sabemos todo se represe 
dentro del ordenador en binario, ai 



2=00000010B -2 = 11111110 en 
implemento a dos. 

os (0=1 y 1=0) 



nendremos 2=11111101, y si le su- 
implemento a dos. Ahora los sun 



sirve XOR A, SUB A 



encarga de cargar el programa RU- 
TRE.BIN, de la 20 a la 70 se encarga de 
la presentación y la petición de demos- 
tración, la 95 y la 120 cargan las 
etiquetas DATOA y DATOB calcu- 



INCREMENTO Y 
DECREMENTO DE 8 Y 16 
BITS 



C Cll„s 



i igualme 
cualquit 



da y de fácil comprensión. EJEMPLO: 

1 LD HL, &HE000 

2 LD B, &H100 

3 REP: INC HL 

4 DJNZ REP 

5 LD (&HA03D), HL 

Comprobaremos que en la posición 

6 HA03D habrá &HE100. No olvide- 
mos que al copiar cualquier rutina el 
directivo ORG & Hnnnn es necesario. 



INSTRUCCION DE SALTO 



CONTADOR DE PROGRAMA 
(PC); todas ls instrucciones de salto 
relativo poseen dos bytes. Este número 
está representado en la figura 4 por la 
letra "e", y podrá tener un valor de 
-126 a +129. El salto relativo tiene 
vital importancia en los llamados pro- 
gramas reubicables. Estos se caracteri- 
zan por su movilidad en zonas deter- 
minadas de la RAM (hay que atender a 
ya que no 



del byte donde se encue 
:HD000 JR^n^'&HDOOO s 



&HD000 jR, nn { 



&HCFEO, en este caso negativa. Res- 
tamos de &HD000 - &H&CFE0 = 
&H20 - 2 = &H1E, restando después 
2. Como es negativo esta cantidad se 
restará de 256, si no lo fuera se 
utilizaría directamente: 256 - &H1E 



SALTOS ABSOLUTOS 

Estos no precisan ningún cálculo, y 
ocupan generalmente de tres a dos 
bytes. En la figura 4 están represi 



ios 11 AGS, 
(SP)! C No U o 
Co: NZ, r 
PO, paridad impar. PE, 



igen igual qu 
pilcamos la PILA 
las repetiré muy 



:igno positi 



.. N, signo ; 



LA INSTRUCCION DJNZ 



el ejemplo utilizado en INC y ahora 
escribiremos una que exceda de 255. 

1 ORG &HD000; situamos la rutina 

2 LD HL.&H0 

3 LD B, 250; número de primer 

4 BUC2: PUSH BC 

6 BUCÍ: INC HL 

7 DJNZ BUCI 

8 POP BC 

9 DJNZ BUC2 

10 LD & HD100), HL; Aquí habrá 

4x250= 1000 
20 RET 

De este modo podemos crear bi 
que excedan de 256. 



En nuestro artículo de la pila SP, 
comentamos las instrucciones CALL, 
RET y su efecto sobre la misma. 
Faltaba la instrucción RST p, donde p 
sería cualquiera de las direcciones 
&H0, &H10, &H18, &H20, &H30 y 



Ensamblador 



&H38 (dirección que mantiene en fun 
programabas pero lo^on, conmutan 




A02 l 



3E00 
CEOO 
323FA0 



A020 C9 



A027 46 
A028 80 
REPASARA 255) 
i 323DA0 
A02C C9 

A02D 3A39A0 
CARREO DE B B. 
A030 213BA0 
A033 46 



SIS 

150 



240 
250 
260 



LD DE , (DATGA) 
LD HL , (DATÜB) 
ADD HL , DE 



RET 



(RESP2) ,A 



; CARGA PRIMER DATO 
; CARGA SE6. DATO 
; SUMA 

; ALMACENA SUMA DE 

BYTES B 
; CARGA ACUM CON O 
: PASAMOS EL VALOR 
DE C 



; RESTA 8 Y 16 BITS CON ACARREO 

LD HL , (DATOA) ; PRIMER DATO 

LD DE, (DATOB) ; SEGUNDO DATO 

AND A ; PONEMOS C A CERO 

SBC HL , DE ; RESTAMOS CON SBC 

LD <RESP1),HL ; ALMACENAMOS - 

RET RESULTADO 

;SUMA 8 BITS SIN ACARREO 

LD A , (DATOA) ; INTROD. DE CANTIDí 
HL, DATOB 



LD 



A , B 



410 DATOA: 

430 RESP1: 
440 RESP2: 



Listado 2 



1 BLOAD "RUTRE.BIN" 

10 PROGRAMA ENLACE RUTINAS DEMO DE RES- 
TA Y SUMA 

20 SCREENO: COLOR 15,12 

30 PRINT "DEMOSTRACION SUMA Y RESTA EN 
COD. MAQ." 

50 PRINT "1-SUMA DE 8-16 BITS CON ACARREO": 
PRINT "2— RESTA DE 8-16 BITS CON ACARREO": 
60 PRINT3-SUMA DE 8 BITS SIN ACARREO": 
PRINT"4-RESTA DE 8 BITS SIN ACARREO" 
65 A$="LA RESTA NO SERA INFERIOR A CERO" 
70 INPUT-INTRODUCIR OPCION"; N:PRINT "OP- 
CION"; N 

80 ON NGOSUB 400, 500 600, 700 

90 INPUT "INTRODUCIR PRIMER DATO"; N 

95 NA = INT (N/256): POKE&HA03A, 

NA:NB = N-NA*256: POKE&HA039, NB 

100 INPUT «INTRODUCIR SEGUNDO DATO"; N 

110 NA=INT (N/256): POKE&HA03C, NA: 

NB=N-NA*256: POKE&HA03B, NB 

120 A=USR(0):RE = 256-'PEEK(&HA03E)+PEEK 

(&HA03F): PRINT "EL RESULTADO ES"; RE 

130 FORN=&HA039TO&HA03F: POKEN, 0: NEXT: 

PRINT "PARA SEGUIR = RETURN, FIN=TECLA" 

140 H$=INKEY$: IF H$= «"GOTO140 

150 IF H$=CHR$ (13) GOTO10ELSE END 

400 PRINT "LA SUMA NO EXCEDERA DE 65535": 

DEFUSR=&HA000: RETURN 

500 PRINTAS: DEFUSR=&HA013: RETURN 

600 PRINT "LA SUMA NO EXCEDERA DE 255": 

DEFUSR=&HA021: RETURN 

700 PRINTAS: DEFUSR=&HA02D: RETURN 



INSTRUCCIONES DE SALTO 

SALTO RELATIVOS 
JR e JR co, e 
JR NC, e JR Z, e 
JR Z, e JR NZ, e 
DJNZ e 




SALTOS ABSOLUTOS 



INSTRUCCION DE LLAMADA 
CALL num CALL co, num 
RET RET co 

RST p 

No expl. RETI RETN 



INSTRUCCIONES ARITMETICAS DE 8 Y 16 BITS 

ss=BC,DE,HL,SP 
pp= BC.DE.SP, 



S=B,C,D,E,H,L,A 
Nro. de 8 bits 
(HL) 

(IX+d), (IY+d) 
SUMA DE 8 BITS: 
ADD s ADC s 

RESTA DE 8 BITS 



d=B,C,D,E,H,L,A 
(HL) 

(IX+d), (IY+d) 



SUMA DE 16 BITS 
ADD ss ADD IX, IX 

ADD IX, pp ADD IY, IY 
ADD IY, pp ADC HL, ss 



INCREMENTO DE, 16 BITS: INC pp, INC IX, INC IY DE 8 BITS: INC d 

DEC d DE 16 BITS: DEC pp, DEC IX, DEC IY 



DECREMENTO DE 8 BITS: D 



TRUCOS DEL PROGRAMADOR 




Los interesados en par- MANHATTAN 
ticipar en esta sección, TRANSFER, S.A. 

Eueden enviar sus descu- Sección: Trucos del pro- 
rimientos en programa- gramador 
ción a: Roca i Battle, 10-12, bajos 

08023 Barcelona 



VERDADERAS 
LETRAS 

colore" r"¿Tnr»T^ífic«« d^M! 

si se estuviera en SCREEN 2, es d! 
haciendo VPOKE a partir de la ta 
de colores BASE (11). El truco cons 



poder cambiar to^do el fondo a la vez se 
puede dar un color transparente (por 
ejemplo: &HF0 frente blanco, fondo 
transparente) a todas las letras j des- 
forma normal, "vpokeando" a partir de 
la tabla BASE (7). 

10 SCREEN 1: VDP(0)=2: 
VDP(3) = 159 

20 FOR A = 0 TO 255: VPOKE 
BASE(5) + A, A: NEXT 

30 DEFINT A-Z 

40 FOR A=0 TO 255 

50 RESTORE: FOR B=0 TO 7: 
D=A»8 + B: READ C 

60 VPOKE D, VPEEK(D) OR 
VPEEK(D)/2 

80 NEXT: NEXT 

90 DATA 12, 3, 10, 9, 13, 5, 4 
100 REM 

110 REM PRUEBA TAMBIEN LAS 
DATAS: 

120 REM DATA 12, 3, 2,.14, 14, 7, 5, 4 
130 REM DATA 6, 8, 9, 10, 9, 8, 6, 6 
140 REM DATA 15, 14, 7, 5, 4, 4, 4, 4 
150 REM DATA 12, 3, 10, 9, 8,13,5,4 
160 REM DATA 6, 6, 8, 8, 9, 9, 10, 10 
Jon Navarro Cuesta 
Llodio-Laudio (Alava) 




600 a 3.000 (a menos de 600 y más de 
3.000 en mi cassette, un Sony SDC- 
600S, no da buenos resultados, pero 
por experimentar que no quede). 
Grabar a 3.000 baudios es muy útil 



programa gr 
de lo normal 

e i0 P REM m BAUDIOS 



40 LOCATE 1, 3: PRINT "1 
DIOS" 

50 LOCATE, 4: PRINT "— 



60 PRINT: PRINT 

70 P(1)=&H53: P(2)=&H5C: 
P(3)=&H26: P(4)=&H2D: 
P(5)=&HF: REM BAUDIOS AJUS- 
TADOS A 1.200 

80 INPUT "BAUDIOS 1 (600- 
3000)"; Bl 

90 INPUT "BAUDIOS 2 (600- 
3000)"; B2 

100 FOR A=&HF3C TO &HF3FF 
110 B=B + 1 

120 POKE A, P(B)/(B1/1200) 
130 POKE A+5, P(B)/(B2/1200) 
140 NEXT 

150 POKE &HF400, P(5) • (Bl/1200) 
160 POKE &HF405, P(5) * (B2/1200) 
170 END 

180 REM 600 1200 1800 2400 3000 

190 REM - 

200 REM &HA6 &H53 &H37 &H25 
&H21 

210 REM &HB8 &H5C &H3D 
&H2D &H24 

220 REM &H4C &H26 &H19 &HE 
&HF 

230 REM &H5A &H2D &H1E 
&H16 &H12 
240 REM&H7 &HF &H16 &H1F 
&H25 

Para poder utilizar las nuevas velo, 
dades es necesario usar las instrucci 
nes SCREEN „,1 o SCREEN „,2 ps 




BIENVENIDOS A msxdub 



UN SOFTWARE DE ALTA CALIDAD PARA MSX 




. Sistema que posees: Q MSX □ MSX2 



